{----------------------- SIPS Module ------------------------

Title: Rename-Panel/BtnMenu UI Callbacks

File: SIPSXM-Ren

Author: R.D.Villwock aka 'Big Bob'

First Written: September 18, 2006

Current Version: 1.51

Last Modified: May 21, 2007

-------------------------------------------------------------}
               { Rename Panel UI Handlers }
  on ui_control (Alpha)

    Show_Alpha       { Display character selected }

  end on { Alpha Knob }

  

  on ui_control (BackSpace)

    BackSpace := false { Don't light this button }

    Back_Space         { Edit Prior character }

  end on { BackSpace }

  

  on ui_control (EnterChar)

    EnterChar := false { Don't light this button }

    Enter_Char         { Put selected char in EditBfr }

  end on { EnterChar }

  

  on ui_control (EraseName)

    EraseName := false { Don't light this button }

    Erase_Name

  end on { EraseName }

  

  on ui_control (LowerCase)

    Set_Zone           { Update zone caption }

  end on { LowerCase }
  
                  { CC Assignment UI Menu Handlers }

on ui_control (CC_Menu) { Menu for standard CC assignments }

  if CC_Menu = -1

    if in_range(LastCC,1,TopCC)

      CC_Menu := LastCC { Last moved CC is OK, use it }

    else  

      CC_Menu := 0      { Last moved CC invalid, set to 'Off' } 

    end if

  end if
  CC_Pending := 0       { Finish BtnMenu routine }
end on { CC_Menu }



on ui_control (CCP_Menu) { Menu for CC assignments including PW }

  if CCP_Menu = -1

    if (in_range(LastCC,1,TopCC) or (LastCC = PitchWheel))

      CCP_Menu := LastCC { Last moved CC is OK, use it }

    else  

      CCP_Menu := 0      { Last moved CC invalid, set to 'Off' } 

    end if

  end if
  CC_Pending := 0        { Finish BtnMenu routine }
end on { CCP_Menu }
